home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / sh1x / sh12a.d64 / bam neu (.txt) < prev    next >
Commodore BASIC  |  1995-03-30  |  213b  |  13 lines
  1. 1 PRINT"[147]DISKETTE MIT SCHUTZ EINLEGEN UND TASTE  DRUECKEN"
  2. 2 POKE198,0:WAIT198,1:POKE198,0
  3. 3 OPEN1,8,15
  4. 4 TR=1:SE=0:GOSUB12
  5. 5 FORI=1TO6
  6. 6 TR=I:SE=I:GOSUB12
  7. 7 NEXT
  8. 8 TR=35:SE=16:GOSUB12
  9. 10 CLOSE1:END
  10. 11 :
  11. 12 PRINT#1,"B-A 0",TR,SE
  12. 13 RETURN
  13.